function generate_tracks_plots()

    maxTracks = 300;
    maxFrames = 200;
   
    L = get_tracks_list();
    
    mark = {'-k '; '-.b '; '--c '; '--g '; '--b '; '--r'};
    
    line_name{1} = 'tracked';
    line_name{2} = 'published';
    line_name{3} = 'detected';
    line_name{4} = 'recovered';
    %line_name{5} = 'discarded';
    line_name{5} = 'lost';
    line_name{6} = 'av. length';
        
    for iii = 1:size(L, 2)
        if (size(L{iii}, 2) > 0)
            A = load(L{iii});
            %R = [R; A];
            G = A;
        end
    end
   
    % Now need to go through list and adjust the scores using your
    % mechanism
    
    close all
    H = figure
    hold on   
    xlabel('framecount');
    ylabel('tracks count');

    axis([0 maxFrames 0 maxTracks]);
    draw_gray_grid(linspace(0,maxFrames,11), linspace(0,maxTracks,11));
    
    legendShown = 0;
    
    for aaa = [3 1 2 6]
        
        R = [G(:,1) G(:,1+aaa)];
       
        if ((aaa < 3) || (aaa == 6))
            P = plot(R(:,1), R(:,2), mark{aaa}, 'LineWidth', 3);
        else
            %P = plot(R(:,1), R(:,2), mark{aaa}, 'LineWidth', 1);
            P = bar(G(:,1), G(:,4:6));
        end
        
        
        %line_name = sprintf('seq-%d', aaa);
        
        if (legendShown == 0)
            %L = legend(P, line_name{aaa}, 'Location', 'SouthEast', 'Orientation', 'vertical');
            L = legend(P, line_name{3}, line_name{4}, line_name{5}, 'Location', 'NorthEast', 'Orientation', 'vertical')
            legendShown = 1;
        else
            hold on
            legend('show')
            [LEGH,OBJH,OUTH,OUTM] = legend;
            
            if ((aaa < 3) || (aaa == 6))
                L = legend([OUTH;P],OUTM{:}, line_name{aaa}, 'Location', 'NorthEast', 'Orientation', 'vertical');
            else
                %L = legend([OUTH;P],OUTM{:}, line_name{3:6}, 'Location', 'SouthEast', 'Orientation', 'vertical');
                %L = legend([OUTH;P], line_name{3}, line_name{4}, line_name{5}, line_name{6});
                %L = legend([OUTH;P],OUTM{:}, line_name{aaa}, 'Location', 'SouthEast', 'Orientation', 'vertical');
                %L = legend(P, line_name{3}, line_name{4}, line_name{5}, line_name{6})
            end
            
        end

        set(L,'FontSize',10);
            
        
    end
    
    %plot(1-precision, recall, '-b ', 'LineWidth', 2);
    
    
    c = clock;
    %timeString = sprintf('%04d-%02d-%02d-%02d-%02d-%02.0f', c(1), c(2), c(3), c(4), c(5), c(6));
    timeString = sprintf('%04d-%02d-%02d-%02d-%02d-%02.0f', c(1), c(2), c(3), c(4), c(5), c(6));
    % outputFilename = sprintf('%s/../../config/scorecard_%s.txt', mfilename('fullpath'), timeString)
    Q = mfilename('fullpath');
    aName = sprintf('%sanalysis/results/tracks_%s.pdf', Q(1:end-30), timeString)
    
    save_to_file_if_possible(H, aName);
    
end